home *** CD-ROM | disk | FTP | other *** search
- page 132,66,2,2
- opt nomd,nomex,loc,cre,nocex
-
- include 'fftlib'
-
- ;
- ; Main program to call the FFT macro
- ; Argument list
- ;
- ; 16 point complex DIT FFT
- ; 4 FFT passes
- ; Data starts at address 0
- ; Twiddle factor table starts at address 16
- ;
- reset equ 0
- start equ $100
- points equ 16
- passes equ 4
- data equ 0
- twiddle equ 16
-
- sin16 twiddle
-
- opt mex
- org p:reset
- jmp start
-
- org p:start
- ditfft points,passes,data,twiddle
- end